(smtpmail-via-smtp): Speciy process coding system.

diff --git a/lisp/mail/smtpmail.el b/lisp/mail/smtpmail.el
index b747eafe16e3e2c3af404738ecf56b9e12cc5e1e..58f6d6af5140fdba738ee2cf06fb51d4125d166b 100644 (file)
--- a/lisp/mail/smtpmail.el
+++ b/lisp/mail/smtpmail.el
@@ -324,6 +324,7 @@ This is relative to `smtpmail-queue-dir'.")
 
          (save-excursion
            (set-buffer process-buffer)
+           (set-buffer-process-coding-system 'raw-text-unix 'raw-text-unix)
            (make-local-variable 'smtpmail-read-point)
            (setq smtpmail-read-point (point-min))